home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / CNBSRC.ZIP / CATONVGA.INC < prev    next >
Encoding:
Text File  |  1996-01-12  |  10.6 KB  |  180 lines
  1.  
  2. pROCEDURE CATonVGA;
  3.  
  4. begin
  5. xline[1] := ' ';
  6. xline[2] := '      I want to take this opportunity to talk about vGa art in        ';
  7. xline[3] := '      relation to the scene, and the ''real world'' aspects. I''ve been  ';
  8. xline[4] := '      through a good many debates (or philosophical discussions if    ';
  9. xline[5] := '      you''d rather) in the past on this issue, and would like to      ';
  10. xline[6] := '      ramble on the subject here a little.                            ';
  11. xline[7] := '                                                                        ';
  12. xline[8] := '      First off, it''s unfortunate that ''the scene'' is so slow about   ';
  13. xline[9] := '      moving into hi-rez, considering the opportunities that the      ';
  14. xline[10] := '      Internet is opening up for us. The www has given us a fantastic ';
  15. xline[11] := '      expanse of space to decorate with art, and the internet in      ';
  16. xline[12] := '      general (taking into account our irc dcc''s and our wealth of ftp';
  17. xline[13] := '      sites) is replacing the need for BBS''s. Ansi art is a beautiful ';
  18. xline[14] := '      thing on a board, but the need for (and use of) BBS''s is        ';
  19. xline[15] := '      dwindling.  Most of us have realized that it''s a lot cheaper to ';
  20. xline[16] := '      subscribe to our local internet provider (or take advantage if ';
  21. xline[17] := '      we have edu/mil/org accesses) than to pay a lot of LD calling our ';
  22. xline[18] := '      buddies'' boards for the new packs. Inet Email mail-lists are     ';
  23. xline[19] := '      replacing the need for BBS mail-nets. Bulletin Boards will some  ';
  24. xline[20] := '      day (not so far off) become an interesting piece of telecom      ';
  25. xline[21] := '      history that we will all brag about having been in on.  Heh.  I  ';
  26. xline[22] := '      encourage all the artists in the scene who aren''t working in  ';
  27. xline[23] := '      vGa to start.  Play around with it.  Ask the vGa guys you like ';
  28. xline[24] := '      for tips or whatever.  Motivate towards hi-rez!  Higher-speed   ';
  29. xline[25] := '      communication has freed us of the need for text-file graphics!  ';
  30. xline[26] := '                                                                      ';
  31. xline[27] := '      Next subject: The rating game.                                  ';
  32. xline[28] := '                                                                      ';
  33. xline[29] := '      Who''s the best?  Who gives a shit.  Well, the fact is, nobody  ';
  34. xline[30] := '      is CONSISTENTLY #1.  Nobody. I could list you my favorite guys  ';
  35. xline[31] := '      in the scene, but none of them are the single BEST. I can find  ';
  36. xline[32] := '      a good prisonernumberone vGa that smokes a hastily done Borian  ';
  37. xline[33] := '      piece, then I can turn right around and pull my favorite       ';
  38. xline[34] := '      Borian piece and put it along side of anything p1 did in the   ';
  39. xline[35] := '      November ACiD pack--none of those compare.  Who''s the BEST is ';
  40. xline[36] := '      any man''s own opinion.  We do some shit that rocks, then once  ';
  41. xline[37] := '      in awhile we do something a little tamer or a little rougher.  ';
  42. xline[38] := '      Whatever.                                                      ';
  43. xline[39] := '                                                                     ';
  44. xline[40] := '      Speaking of P#1, I saw this pic he had in acdu1195 that had a    ';
  45. xline[41] := '      little tag on it saying "I don''t need no fucking scanner". I    ';
  46. xline[42] := '      almost rolled out of my chair. "Yes you did" was all I could     ';
  47. xline[43] := '      think. I don''t give a shit about old school principles.  You    ';
  48. xline[44] := '      wanna buy me a laptop that I can take with me everywhere (seeing ';
  49. xline[45] := '      as how I draw all fucking day) then I''ll draw on it.  Til then   ';
  50. xline[46] := '      I''ll scribble my inspirations down on a grocery bag if I have    ';
  51. xline[47] := '      to, and scan ''em right in.  In the *real* world (this is going   ';
  52. xline[48] := '      to be hard for some of you, since most of ''the scene'' hasn''t had ';
  53. xline[49] := '      any real world graphics arts experience to judge by) all of the  ';
  54. xline[50] := '      tools and software and multitudes of mediums that one can find   ';
  55. xline[51] := '      are welcome in the accomplishment of a graphics project. A       ';
  56. xline[52] := '      scanner is an input device. If the artist using the scanner is   ';
  57. xline[53] := '      an artist, he''s an artist.  If he incorporates a cool snip of   ';
  58. xline[54] := '      photomanipulation into the piece he''s creating to add that      ';
  59. xline[55] := '      special something to it, BRAVO, he has made what he''s making,   ';
  60. xline[56] := '      and he used the tools of the trade to do it.  There are no       ';
  61. xline[57] := '      taboos when it comes to saving time in the graphics business.    ';
  62. xline[58] := '      When I worked in advertising, a client paid X amount of dollars  ';
  63. xline[59] := '      for an ad.  If it took me 1 hour to create that ad, I made the   ';
  64. xline[60] := '      firm 5 times the money I''d have made them if I''d used          ';
  65. xline[61] := '      orthodox/conventional methods and taken five hours to put        ';
  66. xline[62] := '      together the same ad.                                            ';
  67. xline[63] := '                                                                       ';
  68. xline[64] := '      Next some moron wants to turn to me and tell me about how this   ';
  69. xline[65] := '      shit is art, not just graphics.  Okay.  I''ll play your game. If ';
  70. xline[66] := '      it''s art, then it''s no-holds-barred.  Go to a fucking art museum ';
  71. xline[67] := '      you dumbass, count the mediums that people work in. No rule told ';
  72. xline[68] := '      them it wouldn''t become art if they used a certain tool in their';
  73. xline[69] := '      process.                                                         ';
  74. xline[70] := '                                                                       ';
  75. xline[71] := '      But then, I''m cynical about how much "art" is being produced in ';
  76. xline[72] := '      "the scene" to begin with.  When I open my eyes and my mind to   ';
  77. xline[73] := '      what I percieve as art, I would kind of like to feel something,  ';
  78. xline[74] := '      be it emotion, another''s experiences, a sense of connection with';
  79. xline[75] := '      the subject.  I could go on.  When I go through a fucking art    ';
  80. xline[76] := '      pack, I see The fucking Maxx, Evil fucking Ernie, and fucking    ';
  81. xline[77] := '      Spawn.  What do I feel?  Like I just partook of someone else''s  ';
  82. xline[78] := '      boredom.  Big fucking deal.                                      ';
  83. xline[79] := '                                                                        ';
  84. xline[80] := '      Whatever. To close this gripe session, I''ll just say, P1, I      ';
  85. xline[81] := '      wasn''t picking on you (much), (well, ok, the scanner thing was ';
  86. xline[82] := '      a little funny) maliciously, just pointing out an unfortunate ar-';
  87. xline[83] := '      bitrary example.  People need to forget about ''the rules'' and  ';
  88. xline[84] := '      the ''pictures they''re copying'', and the ideas that hold        ';
  89. xline[85] := '      ''the scene'' in a stagnancy that will kill it.                  ';
  90. xline[86] := '                                                                        ';
  91. xline[87] := '      Start drawing vGa.  It''s easy once you get used to a program   ';
  92. xline[88] := '      you feel comfortable with.                                       ';
  93. xline[89] := '                                                                       ';
  94. xline[90] := '      -------                                                          ';
  95. xline[91] := '                                                                       ';
  96. xline[92] := '      (To all you philosophers our there who want to go up against my  ';
  97. xline[93] := '      elitist art views, feel free to email me or catch me on irc.     ';
  98. xline[94] := '      I''ve made a living as a proffessional artist for the past 13     ';
  99. xline[95] := '      years, I''ll be glad to talk with you about your ''rules of the   ';
  100. xline[96] := '      scene'' if you''re interested in a little dose of the *real world*';
  101. xline[97] := '      to stir in with your scene bullshit.)                            ';
  102. xline[98] := '                                                                         ';
  103. xline[99] := '      Catbones[ACiD]                                                   ';
  104. xend := 99;
  105.  
  106. {Read selected text}
  107. textbackground(0);
  108. textcolor(9);
  109. clrscr;
  110. T_HDRimg{Display the text header ansi};
  111. window(4,5,76,21);
  112. gotoxy(1,1);
  113. xch := ' ';
  114. for x := 1 to 16 do
  115. writeln(xline[x]);
  116. while (xch <> (#13)) and (xch <> (#27)) do begin
  117. xch := ' ';
  118. xch := readkey;
  119.   case xch of
  120.        (#80) :begin
  121.                 if x <= xend then
  122.                   begin
  123.                     x := x + 1;
  124.                     gotoxy(1,1);
  125.                     delLine;
  126.                     gotoxy(1,16);
  127.                     writeln(xline[x]);
  128.                   end;
  129.               end;
  130.        (#72) :begin
  131.                 if (x - 15) > (1) then
  132.                  begin
  133.                    x := x - 1;
  134.                    gotoxy(1,1);
  135.                    InsLine;
  136.                    writeln(xline[x-15]);
  137.                  end;
  138.               end;
  139.        (#81) :begin
  140.                 if x <= xend then
  141.                   begin
  142.                     x := x + 1;
  143.                     gotoxy(1,1);
  144.                     delLine;
  145.                     gotoxy(1,16);
  146.                     writeln(xline[x]);
  147.                   end;
  148.               end;
  149.        (#73) :begin
  150.                 if (x - 15) > (1) then
  151.                  begin
  152.                    x := x - 1;
  153.                    gotoxy(1,1);
  154.                    InsLine;
  155.                    writeln(xline[x-15]);
  156.                  end;
  157.               end;
  158.        (#77) :begin
  159.                 if x <= xend then
  160.                   begin
  161.                     x := x + 1;
  162.                     gotoxy(1,1);
  163.                     delLine;
  164.                     gotoxy(1,16);
  165.                     writeln(xline[x]);
  166.                   end;
  167.               end;
  168.        (#75) :begin
  169.                 if (x - 15) > (1) then
  170.                  begin
  171.                    x := x - 1;
  172.                    gotoxy(1,1);
  173.                    InsLine;
  174.                    writeln(xline[x-15]);
  175.                  end;
  176.               end;
  177.   end;
  178. end;
  179. window(1,1,80,25){Return screen to normal size};
  180. end;